home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / comm / gold22.zip / KEYPAD.TAK < prev    next >
Text File  |  1991-03-27  |  3KB  |  96 lines
  1. ;
  2. ; File: KEYPAD.TAK
  3. ;
  4. ; Bob Eager   March 1991
  5. ;
  6. ; Kermit TAKE file to set up IBM enhanced keyboard to emulate a DEC
  7. ; VT100 or similar (e.g. VT2xx, VT3xx).
  8. ;
  9. ; The only difference on the keypad is that the VT keypad - (minus) is mapped
  10. ; to the F11 key on the IBM keyboard. In addition, the DO key on the LK201
  11. ; keyboard is mapped to the F12 key on the IBM keyboard.
  12. ;
  13. ; The LK201 key cluster is mapped not by position but by function (as far
  14. ; as is possible):
  15. ;
  16. ;    LK201            IBM
  17. ;    -----            ---
  18. ;    Insert            Insert
  19. ;    Remove            Delete
  20. ;    Prev Screen        Page Up
  21. ;    Next Screen        Page Down
  22. ;    Find            Home
  23. ;    Select            End
  24. ;
  25. ; The Home, End, Page Up and Page Down keys lose their normal Kermit functions
  26. ; because of the above. However, if SHIFT is held down when they are used, the
  27. ; original functions are restored.
  28. ;
  29. set display        8-bit
  30. ;
  31. ; Define keypad as near to VT100 keypad as possible (non NUMLOCKed)
  32. ;
  33.                     ; NUM LOCK as PF1 done by GOLD
  34. set key \4399        \Kpf2        ; Keypad / as PF2
  35. set key \311        \Kpf3        ; Keypad * as PF3
  36. set key \330        \Kpf4        ; Keypad - as PF4
  37. ;
  38. set key \327        \Kkp7        ; Keypad 7 as keypad 7
  39. set key \328        \Kkp8        ; Keypad 8 as keypad 8
  40. set key \329        \Kkp9        ; Keypad 9 as keypad 9
  41. set key \389        \Kkpminus    ; F11 as keypad - (not often used)
  42. ;
  43. set key \331        \Kkp4        ; Keypad 4 as keypad 4
  44. set key \332        \Kkp5        ; Keypad 5 as keypad 5
  45. set key \333        \Kkp6        ; Keypad 6 as keypad 6
  46. set key \334        \Kkpcoma    ; Keypad + as keypad ,
  47. ;
  48. set key \335        \Kkp1        ; Keypad 1 as keypad 1
  49. set key \336        \Kkp2        ; Keypad 2 as keypad 2
  50. set key \337        \Kkp3        ; Keypad 3 as keypad 3
  51. set key \4365        \Kkpenter    ; Keypad Enter as keypad Enter
  52. ;
  53. set key \338        \Kkp0        ; Keypad 0 as keypad 0
  54. set key \339        \Kkpdot        ; Keypad . as keypad .
  55. ;
  56. ; Define NUMLOCKed keypad keys to be the same as non-NUMLOCKed ones
  57. ;
  58. set key \839        \Kkp7        ; Keypad 7 as keypad 7
  59. set key \840        \Kkp8        ; Keypad 8 as keypad 8
  60. set key \841        \Kkp9        ; Keypad 9 as keypad 9
  61. ;
  62. set key \843        \Kkp4        ; Keypad 4 as keypad 4
  63. set key \844        \Kkp5        ; Keypad 5 as keypad 5
  64. set key \845        \Kkp6        ; Keypad 6 as keypad 6
  65. ;
  66. set key \847        \Kkp1        ; Keypad 1 as keypad 1
  67. set key \848        \Kkp2        ; Keypad 2 as keypad 2
  68. set key \849        \Kkp3        ; Keypad 3 as keypad 3
  69. ;
  70. set key \850        \Kkp0        ; Keypad 0 as keypad 0
  71. set key \851        \Kkpdot        ; Keypad . as keypad .
  72. ;
  73. ; Define LK201 key cluster
  74. ;
  75. set key \4434        \KdecInsert    ; Insert as Insert
  76. set key \4423        \KdecFind    ; Home as Find
  77. set key \4425        \KdecPrev    ; Page Up as Prev Screen
  78. set key \4435        \KdecRemove    ; Delete as Remove
  79. set key \4431        \KdecSelect    ; End as Select
  80. set key \4433        \KdecNext    ; Page Down as Next Screen
  81. ;
  82. ; Define shifted key cluster keys as their original local actions
  83. ;
  84. set key \4935        \Khomscn    ; Shift-Home as roll to top of memory
  85. set key \4937        \Kupscn        ; Shift-Page Up as roll to previous screen
  86. set key \4943        \Kendscn    ; Shift-End as roll to end of memory
  87. set key \4945        \Kdnscn        ; Shift-Page Down as roll to next screen
  88. ;
  89. ; Define miscellaneous keys
  90. ;
  91. set key \390        \KdecDo        ; F12 as DO
  92. ;
  93. ; End of file: KEYPAD.TAK
  94. ;
  95.  
  96.